From: Chong Yidong Date: Mon, 7 Sep 2009 01:31:06 +0000 (+0000) Subject: lisp/cedet/semantic.el (semantic-fetch-tags): Check if progress X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~10241^2~53 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=704d4e89707a07005909a7ec3ed94e650863e44b;p=emacs.git lisp/cedet/semantic.el (semantic-fetch-tags): Check if progress reporter is in use before calling it. --- diff --git a/lisp/cedet/semantic.el b/lisp/cedet/semantic.el index 97780453058..c683cf84837 100644 --- a/lisp/cedet/semantic.el +++ b/lisp/cedet/semantic.el @@ -594,7 +594,8 @@ was marked unparseable, then do nothing, and return the cache." (semantic-parser-working-message (buffer-name)) 0 100)))) (setq res (semantic-parse-region (point-min) (point-max))) - (progress-reporter-done semantic--progress-reporter)) + (if semantic--progress-reporter + (progress-reporter-done semantic--progress-reporter))) ;; Clear the caches when we see there were no errors. ;; But preserve the unmatched syntax cache and warnings!